home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr49 / 119_01.zip / BDOSUSER.ASM < prev    next >
Assembly Source File  |  1993-06-16  |  2KB  |  54 lines
  1. ;
  2. ;5/15/80
  3. ;
  4. ;patch courtesy of Andy Johnson-Laird
  5. ;
  6. ;******************************CAUTION******************************
  7. ;
  8. ;This patch is for grown-ups who know what they are doing.
  9. ;Note that if files of the same name are present on both USER 0 and
  10. ;the logged-in USER number, the OPEN, SEARCH for FIRST, SEARCH for NEXT
  11. ;and READ SEQUENTIAL functions will match directory entries on a first-come
  12. ;first-served basis.  This will cause exciting results if multiple extent
  13. ;files of the same name are present on both USER 0 and logged-in USER.
  14. ;
  15. ;Recommended use:
  16. ;
  17. ;    1) Keep on USER 0 only commonly used programs (Files.COM)
  18. ;    2) Set these programs to $SYS to reduce directory clutter.
  19. ;    3) Set these programs to $R/O to avoid accidental erasure of
  20. ;       invisible programs.
  21. ;    4) NEVER place on any other USER number programs of the same name.
  22. ;    5) Have turn-key applications cold-boot directly into the assigned
  23. ;       USER number.  The USER number is the high nibble of address 4.
  24. ;
  25. ;
  26. msize    equ    20        ;set your memory size here
  27. ;
  28. bdos    equ    (msize-20)*1024+3C00h
  29. ;
  30. patch$area    equ    ??????    ;this will depend on YOUR system, and
  31.                 ;should probably be in your BIOS area
  32. ;
  33.     org    bdos+075eh
  34.     jmp    patch        ;overlays:    mov    a,b
  35. ;                        cpi    0dh
  36. ;
  37. ;
  38.     org    patch$area
  39. patch:    mov    a,b
  40.     ora    a
  41.     jnz    patch2
  42.     ldax    d
  43.     cpi    0e5h
  44.     jz    patch2
  45.     mov    a,m
  46.     ora    a
  47.     jz    bdos+077ch
  48. patch2:    mov    a,b
  49.     cpi    0dh
  50.     jmp    bdos+0761h
  51. ;
  52.     end
  53. erved basis.  This will cause exciting results if multiple extent
  54. ;files of the same name are